home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 003 / rcheck.arc / PRINT2.CMD < prev    next >
Encoding:
Text File  |  1984-12-18  |  768 b   |  20 lines

  1. SET ECHO OFF
  2. *(    PRINT2.CMD and PRINT12.CMD    Print all categories/by date          )
  3. *(    RICHARD T. TRABAND                                                  )
  4. *(                                                                        )
  5. NEW
  6. IF MAIN = 12 THEN
  7.    INPUT b:BUDCATDT.CMD
  8.    OUTPUT PRINTER
  9.      PRINT PRINTRPT SORTED BY DATE TRANCODE CKNUM DESCR +
  10.            WHERE DATE GE .BEGDAT AND DATE LE .ENDDAT
  11.    OUTPUT TERMINAL
  12. ENDIF
  13. IF MAIN = 2 THEN
  14.    OUTPUT PRINTER
  15.       PRINT PRINTRPT SORTED BY BUDCAT DATE TRANCODE CKNUM DESCR
  16.    OUTPUT TERMINAL
  17. ENDIF
  18. FILLIN MAIN USING "PRESS [ENTER] TO CONTINUE  "
  19. QUIT TO b:PRINT.CMD
  20.